fix xfree bug in run_thread

this fixes run_thread to account for the dummy slot
in specpdl

diff --git a/src/thread.c b/src/thread.c
index a8e79e8377db10038b7225349d357a5c813597ca..c7ffaced5c11c6cf1a47e4ee7ee56b8d1e7b8733 100644 (file)
--- a/src/thread.c
+++ b/src/thread.c
@@ -646,7 +646,7 @@ run_thread (void *state)
 
   update_processes_for_thread_death (Fcurrent_thread ());
 
-  xfree (self->m_specpdl);
+  xfree (self->m_specpdl - 1);
   self->m_specpdl = NULL;
   self->m_specpdl_ptr = NULL;
   self->m_specpdl_size = 0;